Этап 1. Заменим на NA месяцы, которые вероятнее всего включают в себя данные за предыдущие пропущенные месяцы (по данным Суммарная_Загрузка_ОНМК)

##    hosp year month_cum month_start month_end
## 1   b26 2018         3           1         2
## 2    b3 2017         2           1         1
## 3   alm 2017        10           1         9
## 4   b37 2017         8           1         7
## 5   b37 2018         8           1         7
## 6   b37 2022         9           1         8
## 7   b37 2024         7           3         6
## 8   b17 2017        10           1         9
## 9   b17 2018         3           1         2
## 10  b17 2019         9           1         8
## 11  b40 2021        11           2        10
## 12  mcs 2023         8           7         7

Этап 2. Проведем Little’s test для оценки характера пропусков

## [1] "Суммарная_Загрузка_ОНМК"
##    hosp      p_value MCAR_MAR
## 1   alm 1.003786e-02      MAR
## 2    b1 2.625941e-01     MCAR
## 3   b16 9.161545e-02     MCAR
## 4   b17 3.594123e-05      MAR
## 5   b26 4.672055e-01     MCAR
## 6    b3 4.996804e-01     MCAR
## 7   b33 4.997776e-01     MCAR
## 8   b37 2.805517e-01     MCAR
## 9   b38 1.420435e-02      MAR
## 10   b4 4.725817e-01     MCAR
## 11  b40 4.608715e-01     MCAR
## 12  mcs 1.076277e-02      MAR
## [1] "Суммарно_Госпитализировано"
##    hosp      p_value MCAR_MAR
## 1   alm 1.003786e-02      MAR
## 2    b1 2.625941e-01     MCAR
## 3   b16 9.161545e-02     MCAR
## 4   b17 3.594123e-05      MAR
## 5   b26 4.672055e-01     MCAR
## 6    b3 4.996804e-01     MCAR
## 7   b33 4.997776e-01     MCAR
## 8   b37 2.805517e-01     MCAR
## 9   b38 1.420435e-02      MAR
## 10   b4 4.725817e-01     MCAR
## 11  b40 4.608716e-01     MCAR
## 12  mcs 1.076277e-02      MAR
## [1] "Тромболизис"
##    hosp      p_value MCAR_MAR
## 1   alm 1.003786e-02      MAR
## 2    b1 2.625941e-01     MCAR
## 3   b16 9.161545e-02     MCAR
## 4   b17 3.594123e-05      MAR
## 5   b26 4.672055e-01     MCAR
## 6    b3 4.996804e-01     MCAR
## 7   b33 4.997776e-01     MCAR
## 8   b37 2.805517e-01     MCAR
## 9   b38 1.420435e-02      MAR
## 10   b4 4.725817e-01     MCAR
## 11  b40 4.608716e-01     MCAR
## 12  mcs 1.076277e-02      MAR
## [1] "Летальные_Исходы"
##    hosp      p_value MCAR_MAR
## 1   alm 1.003786e-02      MAR
## 2    b1 2.625941e-01     MCAR
## 3   b16 9.161545e-02     MCAR
## 4   b17 3.594123e-05      MAR
## 5   b26 4.672055e-01     MCAR
## 6    b3 4.996804e-01     MCAR
## 7   b33 4.997776e-01     MCAR
## 8   b37 2.805517e-01     MCAR
## 9   b38 1.420435e-02      MAR
## 10   b4 4.725817e-01     MCAR
## 11  b40 4.608715e-01     MCAR
## 12  mcs 1.076277e-02      MAR

Этап 3. Заполнение пропусков методом MICE

Этап 4. Коррекция заполненных пропусков, чтобы общая сумма равнялась значению месяца, заполненному NA на Этапе1

Этап 5. Визуализация результатов

Суммарная_Загрузка_ОНМК

## Warning: Removed 31 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 20 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 6 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 18 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 67 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 6 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 21 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 9 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 58 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 90 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 38 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 48 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 43 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 6 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 6 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 21 rows containing missing values or values outside the scale range
## (`geom_text()`).

Суммарно_Госпитализировано

## Warning: Removed 31 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 20 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 6 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 18 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 67 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 6 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 21 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 9 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 58 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 90 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 38 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 48 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 43 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 6 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 6 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 21 rows containing missing values or values outside the scale range
## (`geom_text()`).

Тромболизис

## Warning: Removed 31 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 20 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 6 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 18 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 67 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 6 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 21 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 9 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 58 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 90 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 38 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 48 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 43 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 6 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 6 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 21 rows containing missing values or values outside the scale range
## (`geom_text()`).

Летальные_Исходы

## Warning: Removed 31 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 20 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 6 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 18 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 67 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 6 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 21 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 9 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 58 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 90 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 38 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 48 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 43 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 6 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 6 rows containing missing values or values outside the scale range
## (`geom_text()`).

## Warning: Removed 21 rows containing missing values or values outside the scale range
## (`geom_text()`).